<?php
// This file is part of BOINC.
// http://boinc.berkeley.edu
// Copyright (C) 2008 University of California
//
// BOINC is free software; you can redistribute it and/or modify it
// under the terms of the GNU Lesser General Public License
// as published by the Free Software Foundation,
// either version 3 of the License, or (at your option) any later version.
//
// BOINC is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
// See the GNU Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public License
// along with BOINC. If not, see <http://www.gnu.org/licenses/>. 
//
// This file was modified by contributors of "BOINC Web Tweak" project.



require_once("../inc/util.inc");
require_once("../inc/db.inc");
require_once("../inc/wap.inc");
require_once("../inc/cache.inc");

function show_credit_wap($user) {
	$retstr = "<br/>User TotCred: " . format_credit($user->total_credit) . "<br/>";
	$retstr .= "User AvgCred: " . format_credit($user->expavg_credit) . "<br/>";
	return $retstr;
}

function show_user_wap($user) {
   wap_begin();
   if (!$user) {
	  echo "<br/>User not found!<br/>";
	  wap_end();
	  return;
   }

	// keep a 'running tab' in wapstr in case exceeds 1K WAP limit

	$wapstr = PROJECT . "<br/>Account Data<br/>for $user->name<br/>Time: " . wap_timestamp();
	$wapstr .= show_credit_wap($user);
	if ($user->teamid) {
		$team = BoincTeam::lookup_id($user->teamid);
		$wapstr .= "<br/>Team: $team->name<br/>";
		$wapstr .= "Team TotCred: " . format_credit($team->total_credit) . "<br/>";
		$wapstr .= "Team AvgCred: " . format_credit($team->expavg_credit) . "<br/>";

	} else {
		$wapstr .= "<br/>Team: None<br/>";
	}

   // don't want to send more than 1KB probably?
   if (strlen($wapstr)>1024) {
	   echo substr($wapstr,0,1024);
   } else {
	   echo $wapstr;
   }

   wap_end();
}

$userid = get_int('id');

$cache_args = "userid=".$userid;
start_cache(USER_PAGE_TTL, $cache_args);

$user = BoincUser::lookup_id($userid);
if (!$user) {
	error_page("No such user");
}
show_user_wap($user);

end_cache(USER_PAGE_TTL, $cache_args);
?>
